home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Invisible Universe
/
Invisible Universe (1995)(Voyager)[Mac-PC].iso
/
mac
/
MOVIES
/
FIND.DIR
/
00016_Script_set up text
< prev
next >
Wrap
Text File
|
1995-11-13
|
555b
|
23 lines
on exitFrame
global gBaseListFind, gHilitedFind, gBottomFind, gTopFind, gResList
global gFindFont
set gHilitedFind = 0
set gBaseListFind = 2
set gTopFind = 1
set gBottomFind = the number of lines in field gBaseListFind
set gResList = []
hilite line 1 of field 6
set the textFont of cast 6 = gFindFont
if the machineType = 256 then
set the textSize of cast 6 = 12
else
set the textSize of cast 6 = 14
end if
set the textStyle of cast 6 = "bold"
put the text of cast 2 into cast 5
end